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FUNCIÓN CONTADORA DE NÚMEROS PRIMOS 
En el presente trabajo se desarrollara una función contadora de números primos. 
Desarrollo. 
Sea K un elemento del conjunto de los números naturales 
N = [1,2,3,4,5,6 .....K) 
Si k es un número impar entonces 
k=2n-1 


Sea n la cantidad de elementos impares en k 


=£+05 
n=>3+0. 


Si k es un múltiplo 3 
k=3x(2n+1) 


Sea n la cantidad de elementos impares múltiplos de 3 en k 


La cantidad de elementos impares que no son múltiplo de 3 en k es 


=[£+05]-[5-os] 
De donde se obtiene la función T 
k=T=3n-cos(r * 0.5 xn)? — 4 


Esta función no contiene múltiplos de dos, ni de tres, genera números primos en orden hasta el 23, a 
partir de este punto inician los números compuestos. 
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mn 7 12 31 24 67 
> A —- UU E 25 A 
2 1 14 37 26 73 
3 E 15 41 27 77 
4 7 16 43 28 79 
5 41 17 47 29 83 
6 13 18 49 30 85 
.: 0 19 53 31 89 
8 19 20 55 32 91 
: En 21 59 33 95 
10 25 22 61 34 97 
11 29 23 65 


En estos cuadros se muestra los números compuestos de la función T. 
Cantidad de múltiplos de 5 que existen en un rango T 
T=5*x(3n+ 1 +sen(r x 0.5 x n)?) 


T 1  sen(r *0.5*n)?) 


Cambiando T por X 


HJ(X,5) = LS pa o5| a [5 de os| 


Define la cantidad de múltiplos de P = 5 en X 
Xx Xx 
H(X,5)=S-1 
HJ(X,7) =S — (H](X/7);5)+ 1)- 1 
HJ(X,1D) =S — (HJ((X/1D0,5) + 1) - UJ(X/10;7)+1)-1 


HJ(X,13) = S — (HJ((X/13),5) + 1) - (1J((X/13);7) + 1) —- (8/((X/13);1) + 1)- 1 


s= [+05] -[+ os] 
O l2x*P, 6x* Ph 


JOB) =S-) HIA/B):Pj) — (12) 


J=3 
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FUNCION GENERAL. 
Finalmente los números compuestos para cada valor de P están definidos por la siguiente función. 
n-1 
JP) =S-) HI(X/B):P)) — (12) 
J=3 
FUNCIÓN VR: 
Esta función utiliza el criterio de raíz cuadrada para encontrar un número compuesto en un rango T. 


Utilizare la función seno puesto que esta función se vuelve 1 para todo valor entero impar, esto es 
importante ya que si N es un divisor exacto de T su división dará como resultado un número entero 


impar. 
T Z 
U = [sin(re05 +) | 


N=3i—cos(Tx* 0.5 x 1)? — 4 


3n — cos(r * 0.5 * n)? — 3 


U(n,i) = |si 0.5 
(m1) [sn *i—cos(m*05* 124 


2 


W = P O e o5| ES a, os| +1 


. >) ! 6d 3n — cos(rr * 0.5 * mn)? — 4Y 
= *xUnyx* 
(a) E es 31 —cos(m * 0.5 * 1)? — 4 
l= 
VR(n) = sin(r * 0.5 * (|2 * U(n) — 0.5] — 0.5)? 


Entones utilizando la función VR para eliminar los números compuestos. 


JAP) =S-) HAB): P)) — (12) 


J=3 


s=| 2) +05]-| 00 +05| 


2*P, 6 * P, 
Remplazamos P, por N 
DONDE: 


N(n) = 3n — cos(rr x 0.5 xn)? — 4 
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NOD =( *1— cos(rr * 0.5 * 1)? — 4) x (1— VR) 


1 (1-VR() 
(B) NW 


(O * (1-VR() 


s= (7 O ia- vray +05] - | NO 


+ 0.5 
2*N() 
El termino (n) corresponde a la posición en secuencia del número primo P 
El término” |” corresponde a la posición en secuencia del número N. 


n-2=) (1-VRO) 


J=3 


n-1 


AJA,B) =S- y) HAB): P) (2) 
J=3 


HJ(X,D = (1 VRO)) » (so. 1) ION) — AVR 0») 


J=3 J=3 


Podemos expresar la sumatoria de VR en términos de HJ (X, l). Puesto que la sumatoria de VR 
representa la cantidad de números primos en N (), entonces. 


w(N) 


yo Map)=r= Z HJND,) 


DONDE: 


W(N) = pe E 05|- AE vo EN 54 


Finalmente queda de la siguiente forma. 


W(N) 
Hj(X,D) = [so Dis > 10 (5): )) d+ e HINO,D + ) * (1—VR(D) 
J=3 
PUNTO DE INFLECCION K. 
En este punto la función no es más rápida que la función VR para contar los numero primos. 


El cambio se da cuando se introduce el punto de inflexión K. 


El límite de la función HJ(X,I) es W(X/N), por lo tanto * |” no puede ser es mayor que W (X/N)- 
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K es el punto donde I > W(X/N(D) 


Este punto se puede calcular con la siguiente función: 
VX VX 
os] y 05] +2 
2 6 
DEFINICIÓN FINAL DE ECUACIONES 


La ecuación final con sus respectivos límites estará definida de la siguiente manera: 


h Wi) 
HJ(X,D = (1-VRO) É a y (J(X/N),J)) = ió y HJN,) + ) 


3 J=3 


s= [+08] - [5 +05] 
Cl2B*N 6xN 


N=3xI1-cos(r*0.5 *x 1)? — 4 
3 3 
VX X 


> lg ]] or -+o+a- 


W(X/N) = P aa + o5| ES P a o5| 


Criterios de cálculo 


1. SiX<25 
HJX,D=0 
2. Sil=3 


HJ(X,D = e o5| E + o5| sl 


3. Sil>W(X/N) h=W 


SIl<W(X/IN) — h=1-1 


3 J=3 


h W(1) 
EHN(X,D) =(1-VRO)) E = y (1 ((s df D,))) ld y HU + ) 


CONCLUCION 


La cantidad de números primos debajo de un número X es: 


IZ(X) = E he o5| as E - o5| y y HAD 
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CÓDIGO DE LA FUNCIÓN HJ 
Código de ejecución para visual Basic. 


Function HJ(N As Double, J As Double) As Double 
Dim G As Double 

Dim ¡ As Double 

Dim h As Single 

Dim k As Double 

Dim V As Double 

Dim P As Double 

Dim F As Double 

Dim U As Double 

Dim m As Double 

Ifvr(J) = O Then 

IfJ=3 Then 

ho = (((N+5)1(2*5) - (N+5*3))1(6 *5)) - 1 
Else 

m=3*J+0.5*(-1)"(4+1)-45 
G=(((N + m) 1 (2*m)) - (N + m*8)) 1 (6 * m)) 
V=((((N) * (1/3) + 1)12) - ((N* (1/3))+3)16)+ 1 
P = ((Sgr(N / m) + 1) 12) - ((Sgr(N / m) + 3) 16) + 1 
If J <= V Then 

I=J-1 

Else 

I=P 

End If 

h=0 

¡=3 

Do While ¡<= | 

h=h=+hg((N | m), ¡) 

i=i+1 

Loop 

U = ((Sqr(m) + 1) 12) - ((Sqr(m) + 3)1 6) + 1 
F=0 

Do While k <= U 

F=F+hg(m, k) 

k=k+1 

Loop 

HJI=G-h-J+F+2 


End Function 
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